home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / mmdf / mmdf-IIb.43 / lib / util / lexrel.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-02-01  |  403 b   |  15 lines
  1.  
  2. lexrel (str1, str2)
  3. register char   *str1,
  4.         *str2;
  5. {
  6.     extern char chrcnv[];
  7.  
  8.     while (chrcnv[*str1] == chrcnv[*str2++])
  9.     if (*str1++ == '\0')
  10.         return (0);           /* exactly equal                      */
  11.     if (chrcnv[*str1] < chrcnv[*--str2])
  12.     return (-1);              /* str1 earlier in lexicon            */
  13.     return (1);                   /* str2 is earlier                    */
  14. }
  15.